﻿Public Class msnBox

    Public Shared Sub msnInformacion(msn As String)
        MessageBox.Show(msn, "Información", MessageBoxButtons.OK, MessageBoxIcon.Information)
    End Sub

    Public Shared Sub msnExclamacion(msn As String)
        MessageBox.Show(msn, "Información", MessageBoxButtons.OK, MessageBoxIcon.Exclamation)
    End Sub

    Public Shared Sub msnError(msn As String)
        MessageBox.Show(msn, "Error", MessageBoxButtons.OK, MessageBoxIcon.Error)
    End Sub

    Public Shared Function msnQuestion(mensaje As String) As System.Windows.Forms.DialogResult
        Return MessageBox.Show(mensaje, "Zafiro", MessageBoxButtons.YesNo, MessageBoxIcon.Question)
    End Function

    Public Shared Sub msnWarning(mensaje As String)
        MessageBox.Show(mensaje, "Información", MessageBoxButtons.OK, MessageBoxIcon.Warning)
    End Sub

End Class
